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GRI Real Time Executive 


Introduction: 

The GRI Real Time Executive (%ZRTX) is a generalized controller which can 
be utilized to structure a particular real-time system aimed at a particular 
application. It utilizes july 22445 core memory locations and has a completely 
modular organizational approach. The use of ZRTX, in most cases, simplifies 
and shortens the tasks involved in designing and coding such a real-time appli- 
cations system; and in many cases, allows the user options which would not be 


economically available to him in terms of time spent in designing and imple- 
menting such a controller himself. 


In order to understand the specifications of the various modules which 
can be assembled into an executive applicable to the task at hand, it is 
necessary to understand how 4RTX expects a real-time system to be structured. 
The overall Seeseiee may be separated into four categories: 1) Control 
Programs, 2) Interrupt Service Routines, 3) Task Processors, and 4) Shared 
Subroutines. The actual functions of modules in these four categories in 
any given system may overlap somewhat, but their basic definitions in func- 


tional terms is as follows: 


1) Control Programs 


These are the programs which do the bookkeeping and keep 
track of machine states necessary to coordinate the activities 
of the other units in the system. It is intended that these 


functions be provided for by Z#RTX and its modules. (it should 


\ 


2) 


3) 


4) 
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be pointed out here that this is not the same as what is 
usually referred to as a monitor although one possible 
applications of ZRTX might be to serve as the nucleus of 


a monitor.) 


Interrupt Service Routines 


These are the routines which are entered in response 
to an interrupt, usually a unique routine per unique inter- 
rupt. They can range in complexity from a simple acknowledge 
to a complete task depending on the system design and/or 
timing requirements. $RTX requires certain minimal communi- 
cation with these routines in order to save and restore 


registers and flags correctly. 


Task Processors 


These are the modules which actually perform the tasks 
required for the user's application. Y%RTX also requires 
certain communication with these modules in order to preserve 
system integrity. Normally, the Task Processors will comprise 
the major programming effort for a typical user, although 
special devices may make it necessary for the user to write, 


in addition, some of his own Interrupt Service Routines. 


Shared Subroutines 


These are subtasks which need to be performed by more than 
one of the Task Processors in the system. Generally speaking, 
if a subtask is relatively short, it should be incorporated 
"in line" with each of the processors which require it. If 


it is a lengthy routine, however, core space limitations may 


-require that it be utilized as a shared subroutine. The 


coding of such a subroutine is no different than that of a 
normal subroutine not used in real-time. The call to it 


from the Task Processors which use it, however, involves the 
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use of the SATCH and SSREL routines supplied in the %RTX 
package. These routines attach and release shared sub- 


routines to or from the processor requiring then. 


A very general pictorial representation of the relation- 
ship between these four categories in a typical system is 


offered in Figure l. 
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System Structure: 


After initialization and startup of a system, as well as during the 
periods when a real-time system is idle, ZRTX enters a scan or polling mode. 
In this mode, 4RTX continually and sequentially invokes each user written 
Task Processor. In order for £RTX to know where each processor in the system 
is, and in what state its operations are in, it must reference a processor 
list which is supplied by the user during startup. This list also defines 
the priority of the sioecasune in the system since the entries are polled 
from top to bottom and the entries toward the top of the list have a tendency 
to be polled more often. The highest priority processor is at the top of the 
list, and successively lower priority processors occupy successively lower 


positions on this list. 


Each of the Task Processors has four basic parts: 1) a Save area, 


2) prologue, 3) main body, and 4) exit. The save area is used by ZRTX 


to save registers and processor status when a Task Processor is interrupted. 
Thus, the save area must be at least six words long -- one word for processor 


status and one each for the AX, AY, MSR, TRP, and SC registers. If the user's 
system has other registers that need to be saved, sufficient space must be 
provided to save each one, and the user must supply the code to save and 

restore them -- this procedure is covered in detail under the specifications 
sheets for SUSAV and SURES. The prologue is generally a series of tests which 
determine whether the task for this processor needs to be performed, i.e. whether 
the main body should be entered. If the prologue determines that the task does 


not need to be performed, it simply issues a return to 4RTX which causes it 
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to invoke the next lower priority processor in the list. If it decides the 
task needs to be performed, it continues on into the main body of code. 

The latter, when completed, must exit to @RTX. There are two choices of 
exit -- one which causes %RTX to invoke the next lower priority processor 
(if any) on the list, and another which causes it to begin scanning at the 


top of the list again. 


Generally, most or all of the code within a Task Processor -- including 
any Shared Subroutines, as well as portions of 4RTX itself, are interruptable. 
This means that the "interrupt active" flip-flop within the GRI-909 is in the 
"on" State (via an FOI ICO instruction). Exactly which device or devices are 
allowed to interrupt the system during such times depends on the setting of 
the interrupt status register (ISR) and on which devices have been selected. 
These conditions are under user control within his Task Processors since 
they may initiate input/output or otherwise start devices. The only restric- 
tion applicable to this manipulation is that whatever is done to ISR must 


also be done to the contents of a location within “ZRTX labeled SISR. 


When an interrupt occurs, the “interrupt active" flip-flop is automatically 
turned off by hardware so that it is as if an FOI ICF had been issued just prior 
to entry to the interrupt service routine which handles the interrupt. There 
are two types of Interrupt Service Routines -- those which operate with the 
interrupt active off (or send a zero to the ISR and turn interrupt active on, 
thereby allowing the power fail interrupt only), and those which operate with 
interrupt active on to allow other devices to interrupt. The former are refer- 


red to as "ICF type" or "non-interruptable" Interrupt Service Routines, and 
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the latter as "ICO type" or "interruptable" Interrupt Service Routines. 
ARTX must be informed which type of Interrupt Service Routine is currently 
operating. For an ICOQ-type Interrupt Service, “RTX is so informed by a 
call to $ICO in &%RTX before entering the routine, and by exiting with 
either a call to S$EICO or $NICO. For an ICF-type, “RTX is so informed by 


the exit from the interrupt service which is a call to either SEICF or SNICF. 


The differences between the two types of returns to SRTX from an 
Interrupt Service Routine are analogous to the two returns to &RTX avail- 
able to a Task Processor. The SEICF or SEICO are called "end~mode" returns 
and cause 4RTX to save all the registers for the Task Processor which was 
interrupted, and when all current interrupts have been taken care of, resume 
scanning at the top of the priority list which may result in invoking a 
processor other than the one which was interrupted. The “end-mode" returns 
are generally taken when the interrupt signals a significant change in the 
system. For instance, suppose the Interrupt Service detected a carriage 
return from teletype which usually indicates the end of a line of input. 
this instance, an entire line is now in the computer as opposed to the pre- 
vious teletype interrupts which delivered only one more character into the 
line. The state of the system has changed significantly since the information 
in the input line can now be processed instead of merely collected. If the 
Task Processor which takes care of this is near or at the top of the priority 


list and the Interrupt Service Routine takes an "end-mode" return, the line 


will be processed as soon as possible. On the other hand, the $NICF and $NICO 
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return from an Interrupt Service Routine cause no alteration of the scan 
pointer in ZRTX so that when all current interrupts are taken care of, ZRTX 


resumes by invoking the Task Processor which was interrupted. 


The following running commentary of the flow of control through a 
hypothetical real-time system will give some idea of the bookkeeping and 
control maintained by ZRTX. Suppose there are three Task Processors A, B, 
and C in the processor list and there are three Interrupt Service Routines 
I, J, and K where I and J are ICO types and K is an ICF. Further suppose 
that when I has been entered, the ISR is set to allow both J and K to inter- 


rupt it and when J has been entered, it allows only K. 


Let us say that the system has just been loaded and started so that ZRTX 
begins by invoking processor A whose task might be to start up the three 
devices which correspond to I, J, and K. When this is done, A exits and &RTX 
invokes B, and then C (both of which might have nothing to do until some 
device interrupts). The processor list being exhausted, ZRTX returns to the 
top and invokes A again, which since it has started the devices now has 
nothing to do. It then invokes B, C, A, etc. until finally somebody interrupts, 
say the device which goes to K. Let us say that K issues an end-mode return 
forcing “RTX's scan aaiaeer to the top of the list to invoke processor A. This 
processor sees that K must be restarted and so enters its main body code to 
accomplish this, then exits to “ZRTX. Now ZRTX invokes processor B, which, say, 
has something to do in response to the interrupt from K. But before B can 
finish, an interrupt comes from the device which goes to Interrupt Service 


Routine I. %RTX is informed by I that it is an ICO type and to allow interrupts 
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from J and K. Before I can finish servicing its interrupt, J interrupts it. 
J finishes and takes an "end-mode" return to ZRTX. Since J interrupted I 
which is an Interrupt Service Routine, ZRTX simply remembers the ''end-mode" 
condition and resumes I at the point it was interrupted. When I finishes, 
“RIX resumes scanning at the top of the processor list due to the "end-mode" 
return from J (even if I made a "normal" return). Thus, “RTX invokes processor 
A, which restarts devices I and J. Then ZRTX invokes B. Since B was in the 
middle of some process when it was interrupted, ZRTX invokes B by restoring 


all the registers to what they were when I interrupted it and continues. 


And so forth.... 


Note that in the above description, there are two different ways in 
which ZRTX invokes a processor. In one case, it gives control to the processors 
prologue which decides whether to enter the main body of code. In the other 
case, 4RTX resumes the main body of code at the point it was interrupted. These 
two different modes of entry will be called inactive entry or active entry 
respectively. Also, a processor is in the inactive state, or simply inactive, 
if it will be reinvoked via an inactive entry should it be interrupted. Similarly 
a processor is in the active state, or simply active, if it will be reinvoked via 
an active entry should it be interrupted. 

The difference between the active and inactive states is that if a processor 


is interrupted while it is active, all registers are saved, and when it is in- 


voked again, the registers are restored and processing continues at the point of 


% RTX 
70-44-001 
1-10 


interrupt; whereas if a processor is interrupted when it is inactive, no registers 
are saved, and when it is invoked again, it is entered at a specified location 
rather than continuing at the point of interrupt. The address -1 of this speci- 
fied location is in the first word of the processor's save area. This word is 


§ if the processor is in the active state. 


The state (active or inactive) of a processor at a given point in its 
operations is extremely important to the successful completion of its assigned 
task. When the user is writing a section of code for a processor in the system, 
he should make sure which of the two states he wants that section to be operat- 
ing under and set up the first word of his save area accordingly. A general 
rule for making this decision is that if the section of code is referencing 
things that can change via an interrupt (either by an Interrupt Service routine 
or a higher priority processor which might gain control via an "end-mode" 
return) and if such a change would make it meaningless to continue to the 
completion of the code, that section should be inactive. Otherwise, the active 
state is generally desirable. Typically, a prologue is inactive since it 
usually involves testing things that change, and the first instruction of the 
main body would be to set the processor active (by zeroing the first word of 
its own save area). For this reason, whenever ZRTX enters a processor's pro- 


logue, it is in the inactive state. 
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CHAPTER TWO 
REAL TIME EXECUTIVE (%RTX) 

Length: 340 (224, 5) 

Entry Points: Detailed descriptions follow 

Name Function 

SSTRT - start scan, main entry 

SPRCL - contains address -l of processor list 

SNEXT - return from inactive processor (e.g. prologue) which 


allows next lower priority processor to be invoked. 


SRSME - return from inactive processor which allows resumption 


of another specified processor. 


SNREL - return from active processor which forces processor 


scan to begin at top of priority list. 


SEXEC - return from active processor which allows next lower 


priority processor to be polled. 


SACTV - subroutine cellable by processor or interrupt service 


routine to set itself active. 


SICO - must be called at beginning of ICO-type interrupt 


service routines. 
SSAVA - contains address of current save area. 


STRP - save location for TRP register prior to calling $ICO, 
SEICF, or SNICF. 


SEICO - end mode return from ICO-type interrupt service routine, 


forces processor scan pointer to top of list. 


SNICO - normal return from ICO-type interrupt service routine, 


processor Scanner not altered. 
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Name Function 
SISR - system interrupt status word. 
SPROL - contains address -l of current processor's prologue 
entry. 
SSCAN - contains address of second word of current entry on 
processor list. 
SREST - contains processor save area address during restoring 
registers. 
SEICF - end mode return from ICF-type interrupt service 
routine (see SEICO). 
SNICF - normal return from ICF-type interrupt service routine 
(see SNICO). 
SINTL - contains address -1 of interrupt location for ICF-type 


interrupt service. 


The most commonly used entry points are discussed first. The others are 


used generally by the special sharable subroutines supplied with ZRTIX such as 


SATCH or SGETM, etc. 


1) 


2) 


SSTRT 


This is the call to ZRTX which starts the scan after the 
user has submitted his processor list (see below) the interrupt 
active flip-flop should be off, as will normally be the case 
during start-up since depressing the Start switch on the console 


automatically turns it off. 
SPRCL 


During initialization, the user must submit a processor 
list to ZRTX. This is done by storing the address -1l of the 
beginning of the list in S$PRCL. The format of the list is as 


follows: 


3) 
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Processor List 


PROL2-1 


[aan 


fe [Pace 
[savanna 
a as 


PROL1 is the address of the highest priority processor's 


prologue, and SAVAl is the address of its save area. PROL2 
and SAVA2 are for the next lower priority processor, etc. 


The list ends with a zero word. 


Bit 15 of the PROL entries are normally = $. Should 
Bit 15 be set to 1, ZRTX will skip. that processor entirely 
during the scan - this allows the user to exercise some extra 


control over which processors can be invoked at any given time. 


Also, when a processor list is initially submitted, the 
first word of each processor's save area should contain the 
address -l1 of its prologue (i.e. the same address as is in 
the list). This is a required initial condition, the actual 
contents of this word will change during operation. It is 
suggested that this initial condition be taken care of during 
the assembly of the processors so they will be loaded with the 


proper value in the first word of their save areas. 
SNEXT 


This is a retum to 4RTX which causes ZRTX to bump its 
scan pointer to the next processor on the list. This return 
can only be made from an inactive processor -- if this is 
called from anywhere else, 4RTX will blow up. 
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The most common use of this return is if a processor's 
prologue finds that the processor has nothing to do. It 
returns control to ZRTX via a JU SNEXT (or a JC, etc.), 


allowing the next processor to be scanned. 
4)  SNREL 


This is one of two types of return to &@RTX that can be 
made from either an active or inactive processor. The 
processor which issues this return will be set inactive in 
such a way that the next time it is invoked, it will be 
entered, inactive, at its prologue. The scanner in 4RTX 


is forced to the top of the processor list by this return. 
5) SEXEC 


This is the normal exit from an active processor. It 
does the same thing as S$NREL, except the scanner is bumped 
to the next lower priority processor in the list. This 


exit can also be called from an inactive processor. 
6) S$ICO and STRP 


SICO is called by an ICO-type interrupt service routine 
after saving the TRAP in S$TRP and before it does any actual 
processing. The call should look Like: 


RM TRP, STRP ;SAVE TRAP REGISTER 
JU $ICO 
WRD INTLC ; INTERRUPT LOCATION 
WRD LRMSK ;ISR MASK 

ISAVA: LOC +19 38 WORD SAVE AREA 


;BEGIN INTERRUPT SERVICE 


Where INTLC is the address of the location where the SC 
was stored when the interrupt occurred, IRMSK is used by ZRTX 
to "AND" against the ISR, so IRMSK should have 1's in all bit 


positions except those for which interrupts from the corresponding 
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device are not to be allowed. (In particular, another interrupt 
from the same device should not be allowed, i.e. IRMSK should 
have at least one § bit position corresponding to the device which 


just interrupted.) 


The area at ISAVA is used as follows: 


Saved ISR 


Active/Inactive 


Save area for 


AX, AY, MSR, TRP, 


SC should this 


be interrupted 


Vill contain the result of 
"ANDing" the old ISR with IRMSK and the interrupt service 
routine will be in the active state (ISAVA+2 will be set to 9). 


Furthermore, “ZRTX will have set itself in “interrupt mode" 
which has certain consequences for saving and restoring registers 
if further interrupts occur, the main one being that if an ICO-type 
interrupt service routine is interrupted, only AX, AY, MSR, TRP, and 
SC are saved in its save area -- no provisions are made for saving 


.additional registers as is the case with processors. 


An ICO-type interrupt service routine can set itself inactive 
the same way a processor can -- and for the same reasons. It does 
so by setting its ISAVAt2 location to the address -l of the inactive 
entry. 


The "cascade information" location is set by #RTX to the address 
of the previous (if any) interrupted interrupt service routine's 
ISAVA area. A diagram showing pictorially how cascading operates 


is shown in Figure 2. 
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7) SEICO 


This may be called by an ICO-type interrupt service routine 
only. If it is called from anywhere else, ZRTX winces. A call 
to SEICO exits from the ICO-type interrupt service routine and 
alters the processor scanner so that when all current interrupts 


have been serviced, “ZRTX resumes scanning at the top of the list. 
8) SNICO 


This is the other exit from an ICO-type interrupt service 
routine. It is the same as SEICO except the processor scanner 


is not altered. 
9) SISR 


This location should reflect what the ISR says when ZRTX 
is in the processor scan. To be safe, whenever the ISR is 
altered, SISR should be altered in the same way and the line 
of code which does these operations should be preceded by an 


FOL ICF and followed by and FOI ICO. 


Note: Do not alter ISR and then store ISR in SISR. 
First alter ISR, and then do the same operation on 
SISR. Normally (e.g. during processor scanning), 
ISR and SISR will be equal, but certain relations 
between cascaded interrupt routines can cause them 


to be unequal. 
10) SINTL 


This location is set up during the entering of an ICF-type 
interrupt service routine. It should be set to the address -l 
of the location in which the SC was stored when the interrupt 


occurred. 


An ICF-type interrupt service routine should save and 
restore all registers it alters during its operation. Thus, 
a typical entry to an ICF-type interrupt service routine is 


as follows: 
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INRUP: RM  TRP,STRP ;SAVE TRAP REGISTER 
MRI INTLC-1,TRP 3SET UP ADDR-1 
RM  TRP,SINTL 30F INTERRUPT LOCATION 
RMI AX,¢ ;SAVE REGS 
RMI AY,@ 
RMI MSR,¢ 
RMI ISR,¢ ;THESE 3 INSTRUCTIONS 
ZR ISR ;ALLOW POWER FAIL 
FOI ICO -3AND ARE NOT VITAL 


The last three instructions need not be included if 
allowing a power fail interrupt is not crucial while the 
ICF-type service routine is operating. Similarly, the 
Saving of one or more of AX,AY or MSR may be omitted if 


it is not altered -- although typically all of them will be. 
11) SEICF and $NICF 


These are the exits available to an ICF-type interrupt 
service routine. They are analogous to the $EICO and $NICO 


exits available to an ICO-type interrupt service routine. 


Since an ICF-type interrupt service routine saved 
registers upon entry, it must restore them upon exit. To 


continue the example above, the exit from that routine would 


be; 
MR INRUP+7,AX ;RESTORE REGISTERS 
MR INRUP+11,AY — 
MR INRUP+13,MSR 
FOL ICF 3;ONLY FOR POWER 
MR INRUP+15 , ISR 3;FAIL OPTION 


JU SNICF (or JU SEICF) 


Where the two instructions beginning at the FOI ICF are not 


necessary if the power fail was not enabled on entry. Note also 


that the TRP need not be restored. %RIX will restore it from 
STRP. 
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If $EICF or $NICF are called from anywhere but an ICF-type 
interrupt service routine, “ZRTX grumbles. 

The less commonly used entry points are SACTV, SRSME, $SAVA 
SPROL, $SCAN and SREST. They are present primarily for such 
routines as SATCH, $GETM, etc. which need to reference certain 


locations in ZRTX. 
12) SACTV 


This entry point merely zeroes the first word of the save 
area of the current processor or the ISAVA+2 location in the 
case of an Interrupt Service Routine. ie.,it sets the current 
processor or Interrupt Service Routine active. Usually this can 
be accomplished by a ZM instruction. However, in some cases, 
notably in certain types of shared subroutines, the location to 
be zeroed may not be known. The user is not likely to encounter 


this situation. 
13) SRSME 


If this is called with AX set to the save area address -l, 
and AY set to the prologue address -l of a given processor in 
the system, that processor will be invoked correctly and imme- 
diately. The scan pointer remains as it was so that if the 
invoked processor calls $NEXT or $EXEC, the scan pointer is 
updated to the next lower priority processor below the proces- 
sor which called $RSME, The interrupt control flip-flop must 
be off before SRSME is called (i.e. issue a FOI ICF and then 
go to S$RSME). 


The primary purpose of $RSME is to accommodate the SATCH 
and S$SREL routines. It is also used by $GETM. 


14) SSAVA, SPROL, SSCAN 


These are adequately described in the list of entry points 


given on pages 10 and ll. 
15) SREST 


A call to SREST-1 with AX set to a save area address will 


restore registers and resume an interrupted, active processor. 
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Again, this entry point is defined for use by some of the other 
routines supplied with “RIX and is normally not called by user 


programs. 


Notes; 

1) SACTV and SICO are the only entries in “RTX which return 
control to the caller immediately following the call. No registers 
(except the TRAP) are altered by SACTV. 

2) Whenever ZRTX transfers control to an inactive entry, 
only the following conditions are guaranteed: 

a) AX = address -1 of current save area 

b) AO is in ADD state 

c) BOV is clear 

d) LNK is clear 

e) ICO is on (i.e. a FOI ICO has been executed) 

f) The contents of the save area will not have 
been altered in any way. 

3) Whenever ZRTX transfers control to an active processor or 
Interrupt Service Routine, the following conditions are guaranteed: 

a) All registers, except possibly the ISR, will 
contain the values they had at the time of the 
interrupt. This includes the SC, meaning that 
the program resumes as if nothing had happened. 

b) The contents of the save area may have been 
altered in order to save (and subsequently 
restore) the registers. 

c) ICO is on (i.e. a FOI ICO has been executed). 

A pictorial diagram of the differences between an inactive 
and active state is shown in Figure 3. 
4) Should the system need to provide for saving registers in 


addition to AX, AY, MSR, TRP and SC (e.g. 6 GPR) the procedure in- 


volves. using a version of ZRTX with calls to SUSAV and SURES and 
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providing two routines with entries $USAV and $URES. This is des- 
cribed in detail under fhe specifications for SUSAV and SURES. 
5) It is possible to dynamically submit a new processor list. 
For instance, during the operation of the system a condition may 
occur which requires a different set of processors to handle than 
those currently operating; all that needs to be done here is to 
Submit a new processor list. 
A new list can be sumbitted at any time by anybody except a 
shared subroutine or within the scope of an attach (see $ATCH). 
The procedure is to simply store the address—l of the new processor 
list into SPRCL. To assure that ZRTX begins scanning the new list 
immediately, do the following: 
a) If the new list is being submitted by an 
Interrupt Service Routine, exit via an "end- 
mode" return (i.e. S$EICO or SEICF). 
b) If the new list is being submitted by a Task 
Processor, start the procedure by issuing a FOI 


ICF, then store the new list address -1 in SPRCL, 
and then exit via SNREL. 
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should interrupt occur 
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USER SAVE/RESTORE 


These are user written routines to save and restore registers other 
than the standard. A special version of %RTX with SUSAV/SURES calls must 
be used rather than the normal version of ZRTX. The tape of ZRTX with 
SUSAV/SURES calls is numbered 70-43-022R-A and is four locations longer 


than the normal version of ZRTX. 


SUSAV 

This will be called during the saving of registers. The AX register 
will contain the value of the SC at the time of interrupt. ZRIX expects 
SUSAV to save additional registers and return without destroying the AX 


register. An example might be, for the 6 GPR option (or a Model 40): 


ENTRY SUSAV 
SUSAV: RMD 30, SSAVA;SAVE GPR's 
RMD | 31,SSAVA 
RMD 32 ,SSAVA 
RMD | 33, S$SAVA 
RMD 34 ,SSAVA 
RMD 35,SSAVA 
RR TRP ,SC;RETURN 
END 


SURES 

This wil be called during the restoring of registers. Everything 
except the users registers and the SC will be restored before control is 
given to SURES. ZRIX expects this routine to restore the user's registers 
without destroying any of AX, AY, MSR or TRP, and then SURES must restore 


the SC. To continue the example, the SURES that corresponds to the SUSAV 


above could be: 


Note: 


SURES : 


ENTRY ' SURES 
MRD SREST, 30 
MRD SREST, 31 
MRD SREST, 32 
MRD SREST, 33 
MRD SREST, 34 
MRD SREST, 35 
FOI Ico 

MRD SREST ,SC 
END 
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;RESTORE GPR's 


;THESE RESTORE 
;THE SC 


If SSREL, SAHGH or $ALOW are to be included in the system, the 


special versions (which call $USAV,SURES) of these routines must be 


used. 


two locations longer than the normal. 


The special version of $SREL is numbered 70-43-023R-A and is 


The special version of S$AHGH/ 


SALOW is numbered 70-43-024R-A and is four locations longer than the 


normal. 
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ATTACH 


Length: 779 (63, 9) 
Entry Points: $ATCH 
Function: 

This routine is used to eliminate conflicts in the usage of shared 
subroutines in the system. It does this without requiring the subroutine to 
be written differently from a subroutine written for non real~time use. If 


SATCH and $SREL are used, for instance, reentrant code is unnecessary. 


Usage: 

For each subroutine which is to be shared between processors in the 
system, the user should assign a single core location initially set to zero. 
This location will be used as a flag to indicate whether the associated sub- © 


routine has been "attached" or not. The flag is examined and set by SATCH. 


Before a processor in the system calls a shared subroutine, it should 
first "attach" it by calling SATCH and giving as an argument the address of 
the flag or flags associated with the subroutine(s) it wishes to attach. 


The general format of the call is: 


JU SATCH 

WRD FLAGL ;ADDRESS OF SUBRL FLAG 
WRD FLAG2 3 ETC 

WRD FLAGn+19996¢ 


whereas the last or, in most cases, the only argument has Bit 15 set (by 


adding 199999 g to the address). 
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When control is returned to the processor which called SATCH, each 
FLAG listed in the call sequence will be set to the address “igs the pro- 
cessor's prologue -1 entry in the processor list to identify the processor 
who has attached the subroutine(s). In addition, the processor will be set 
active (i.e. SATCH could possibly be called from an inactive section, but 


upon return the caller will be active). 


' The processor is now free to call the subroutines whose flags were 
listed in the call to the $ATCH. To release the subroutine for use by 
other processors it is only necessary to zero the flag word associated with 
that subroutine, and the ZM FLAG instruction must be followed by a JU SSREL 
which informs ZpTX that any higher priority processor which may ee tried 


to attach the subroutine can now do so. 


The scope of an attach consists of all code within a processor from the 
call to the SATCH routine to the point at which either the last of the flags 
listed in the SATCH call has been zeroed followed by a JU SSREL, or an exit 
has been made to &RTX (SNREL or S$EXEC). (Usually all flags should be zeroed 
before such an exit, although it is possible to structure things so that a 


subroutine is attached to the same processor for several scans by %RTX.) 


Great care must be taken if SATCH is called within the scope of an attach. 
For example, to attach more than one subroutine, the following procedures 


are okay: 
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JU SATCH 
-WRD - FLAG] 
WRD FLAG2 + 10900¢ 
JU SUBR1 ;NEED SUBR1 TWICE 
SCOPE : . 
JU SUBR2 sNEED SUBR2 ONCE 
ZM FLAG2 ;SIGNAL DONE SUBR2 
JU SSREL 
JU SUBRL :2nd TIME SUBRI 
ZM FLAGL ;THEN DONE 
gy, * SSREL 


The scope of the attach extends from the JU $ATCH to the JU SSREL 
following the ZM FLAG1 and is bracketed above. (Note that the JU S$SREL 


following the ZM FLAG2 does not delimit a scope.) 


Another way: 
JU SAT CH 
WRD FLAG] + 1999G¢ 
JU SUBR1 
- 2M FLAGL 
| JU SSREL 
SCOPES ‘ 
JU SATCH 
WRD FLAG2 + 160009 
JU SUBR2 
ZM FLAG2 
JU SSREL 
JU SATCH 
WRD FLAG] + 199999 
JU SUBR1 
ZM FLAG1 
JU SSREL 


The scopes are marked. 
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However, the following could cause a disaster unless the two rules 


stated below are complied with. 


JU SATCH 
WRD FLAGI+ 16909¢ 
JU SUBRL 
JU SATCH 
WRD FLAG2 + 10999¢ 
ig : 
2 JU SUBR2 
ZM FLAG2 
JU SSREL 
ZM FLAG1 
JU SSREL 


1. Scopes must be fully nested, i.e. the following overlapping of scopes 


will cause a disaster: 


2. There must not exist two processors in the system with nested scopes in 
reversed sense of each other. ie., the following will cause a disaster if 


Processors A and B are in the same system: 
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Processor A Processor B 
JU SATCH JU SATCH 
WRD FLAG] + 199090 . WRD FLAG2 + 1990G¢ 
JU SATCH JU SATCH 
WRD FLAG2 + 1990G¢ WRD FLAGL + 1696G¢ 
ZM FLAG2 ZM FLAGL 
Ju SSREL JU SSREL 
ZM FLAG] | ZM FLAG2 
JU SSREL JU SSREL 


Note that Processor A has the scope of the attach for FLAG2 nested 
within the scope of the attach for FLAG] whereas in Processor B it is the other 
way around. The following would be okay, however: 


Processor A A Processor B 


ar it, 
on o : 


Descriptio 


If SATCH is called and one of the flags in the argument list is non-zero 
(attached to somebody else), the processor which called SATCH is set inactive 
in such a way that the next time it is invoked by 4RTX it will resume inside 
the SATCH routine to examine the particular flag again. S$ATCH then uses the 
information in the non-zero flag to call $RSME to force the processor to which 
the subroutine was attached to continue operating. Should the latter zero the 
flag and call $SREL, things have been set up so that SATCH is immediately re- 
entered. Since the flag is now zero SATCH attaches the subroutine to the 
original caller, and, if the last flag in the argument list has been processed, 


sets the caller active and returns. 
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Note that the processor which "finished" the subroutine had control 
only up to the call to S$SREL at which point the original caller to SATCH 


regained control. 


By this means, the subroutine is given to the highest priority processor 


which is trying to attach it at any particular time. 


Notes 
1) It is okay to have inactive code in the scope of an attach. (But see note 5.) 
2) SATCH cannot be used by Interrupt Service Routines. 


3) Since $ATCH may set the caller inactive, and in this state 
no registers are saved in case of interrupt, it may be safely 
said that SATCH has the possibility of destroying the contents 
of every register. However, when SATCH returns, the following 
machine conditions are guaranteed: 


a) AO is in the ADD state. 
b) AX = contents of SSCAN. 
c) AY = -2 

d) LNK is set. 

e) BOV is clear. 


In. addition, the caller will be active and all flags in the 
argument list will be non-zero (attached). 


4) SATCH can be used to attach anything. For instance, one pro- 
cessor may wish to alter a table and keep other processors from 
using the table until it is done. Or, on the Model 40, 

instead of taking the time to save and restore the 6 GPR at every 
interrupt, the processors which use them can attach them either 
singly or as a group. SATCH is perfect for such applications. 


5)  SATCH. may be used in a system which submits more than one pro- 
cessor list in the course of its operation provided: 


a) All elements of the system are permanently in core. 
b) The scope of any attach which references a flag which is 


also attached by a task in another processor list must be 
free of any inactive code or returns to 4RTX. 
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SUBROUTINE RELEASE 


Length: 24, (20, ) 


Entry Points: $SREL 


Allows higher priority processor to attach and use subroutine just 


released. 


Usage: (See SATCH) 

Call SSREL immediately after zeroing an attached flag. This allows 
the released flag to be attached by any processor waiting for it (if any). 
No information other than the trap register is destroyed by this call. lI.e., 
SSREL acts as if it were an interrupt and saves all registers (and goes to 
SUSAV if incorporated) so that ZRTX restores everything, returning just follow- 


ing the call to $SREL. 


Description of Algorithm: 


SSREL saves all registers in the callers save area, decrements S$SCAN 
by two and jumps to $NEXT. This has the net effect of either restoring the 
caller immediately, or resuming in the SATCH routine should it be waiting on 


the flag just zeroed before the JU SSREL. 


Notes 
1) Do not call $SREL from an inactive processor. 


2) See note to write up for SUSAV, SURES. 
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GET MEMORY/PUT MEMORY 


Length: 454 (300, |) 
Entry Points: $GETM, $PUTM, $SPUTP 
Function: Dynamic Core Allocation 
Subroutine Called: 4RTX, SSREL 
Should the real-time system be such that the demands for memory which 
need to be assigned to tasks are unpredictable, these routines can be used 


to assign and release areas of core storage. 


SGETM - Get Memory 
This is called with one argument stating the number of storage loca- 
tions desired, e.g. 
JU  SGETM ;GET 300 WORDS 
WRD 300 ;OF FREE CORE 
Upon return the address of the first location of the requested block 
of core will be in the AX register. The free area will consist of exactly 
the number of words requested and no more. If a block of core of the size 
requested is not available at the time it is Heeseea: the processor which 
called S$GETM will be placed in a "wait" state until that memory is available. 
In this state the processor is inactive and, essentially, removed from the 


system. The net result is that a call to $GEIM may allow all other proces- 
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sors to operate before control is returned. Also, since it can become inactive 
there is the possibility that all registers in the system will be altered. The 


only conditions guaranteed on return are: 


1) AX = address of first location of free core area of size requested. 
2) AO in ADD state. 


3) LNK is clear. 


SPUTM ~ Put Memory 


This is called with the address of the first word of the free area in 
register AX. This value must be sna ee a value returned by some previous 
call to $GETM. Upon return the core area will no longer be assigned, i.e. it 
is available to $GETM to assign to the next request. Since this routine can 
become inactive waiting for $GETM to finish operating, it is possible for all 
registers in the system to be altered on return. The only condition guaranteed 


on return is that the AO is in the ADD state. 


SPUTP - Put Partial Memory 
This is called to make a partial area of core available to $GETM. For 


instance, a processor might call $GETM to read in a block of data from a 


device. It is known that this data could occupy up to 200, words of core, so 


8 
the call to $GETM requests 200 words. When the data has been read in, the 


processor discovers that it consisted of only 50, words. If desired, the last 


130, words can be released for $GETM to assign elsewhere by calling S$PUTP. 
For this call, AX must be set at the address of the first word of the complete 
block (i.e. the value originally returned by $GETM) and AY is set to the address 


of the first word of the partial area to be put back. 
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For example, suppose it is desired to read in a data block which might 


be 500, words long. A processor could proceed as follows: 


JU SGETM GET 500 WORDS 

WRD 500. 

RMI AX,G ;SAVE START OF 
STBFR =  --l ;sBUFFER ADDRESS. 


Suppose after reading, the address of the last data word stored is in 
"LAST'. The following will allow the area from the word following the last 


data to the end of the original buffer to be made available to $GETM: 


MR LAST, Pl, AY 3ONE BEYOND LAST TO AY 
MR STBFR, AX 39TART OF BUFFER 
JU SPUTP 


And finally when the processor is completely done with that memory area 


it calls $PUIM with the original address to release the rest of the buffer, i.e. 


MR STBFR, AX 3PUT BACK ASSIGNED 
JU SPUIM ; MEMORY 


= 


Of course, the intermediate steps of putting back the partial area could 


be omitted if core space is not that much of a premium. 


Notes 


1) These routines can be called from an inactive area. However, the 
caller will be active upon return. 


2) Free core is originally set by a call to $SETM (see its write-up). 
during initialization. 


% RIX 
70-44-001 
2-25 


SET MEMORY 


Length: 30, (24, 9) 
Entry Points: $SETM 


Function: To initialize pointers in memory for SGETM and $PUTM. 


address of first free core location. 
address of last free core location. 


Calling Sequence; AX 
AY 


JU SSETM 


Usage. 
This routine should be called during system initialization (start-up) 
to define free core to $GETM and S$PUTM if dynamic core allocation is to be 


used. 


Notes: (See also SGEIM, SPUTM) 


1) If S$SETM is loaded last, it can reside in the free core area. In 
this case it will be destroyed during the operation of the system, but 
usually this does not matter since $SETM cannot be called at any other 
time except initializatior/start-up. 


2) Free core must be one contiguous block (usually from the end of the 
programs to the beginning of the resident loaders in high core). 


3) $SETM does not zero the free core area, it only intializes pointers. 
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ALLOW HIGH/LOW 


Length; 31 (25,9) 
Entry Points: $AHGH, $SALOW 
Function: Allows all higher priority ($AHGH)or all lower and higher priority 


(SALOW) processors to be invoked before resuming. 


_ Usage: 

If it is known that a processor in the system is going to take a consider- 
able amount of time to complete its task, it can prevent other processors from 
being excessively "locked-out" by calling SAHGH or SALOW. The calling sequence 
has no arguments. Both routines save and restore all registers with operation 
resuming at the return point. S$AHGH and SALOW may be thought of as a program- 
med interrupt. $SAHGH forces the scan pointer to the top of the priority list 
and returns to 4RTX, thereby beginning the scan on all higher priority proces- 
sors. $ALOW bumps the scan pointer to the next lower priority (if any) pro- 
cessor in the list and returns to 4P.X, thereby beginning the scan on all 
lower priority processors, followed by a scan on all higher priority processors. 
In either case. ZRTX eventually re-invokes the processor which called SAHGH or 
SALOW, causing registers to be restored and processing to resume following the 


point of call. 


Notes 


1) Do not call these from an inactive area. Instead, call $NEXT 
(analogous to SALOW) or S$STRT (analogous to S$AHGH). 


2) See notes to write-up of SUSAV, SURES. 
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WAIT 


Length: 54. (44,9) 
Entry Points: SWAIT 
Function: To wait for a dynamic condition without locking up the system in 


a tight loop. 


Calling Sequence: 


Set AY 

JU SWAIT 

WRD ARG1 3; CONDITION 

WRD ARG2 ;sADDRESS OF FLAG 


Usage: 

If a processor needs a certain condition fulfilled before it can proceed 
with its operations, it can use $WAIT to avoid locking up the system in a tight 
loop. For instance, suppose the condition is the completion of input into a 
buffer, and that this is signaled by the Interrupt Service Routine setting "IDONE" 


to a value greater than 9. The following could be done, but is not advisable: 


MR IDONE, AX 
JC AX, LEZ, .-2 


because the entire system is locked out while this processor is in the two 


instruction loop waiting for IDONE to become greater than zero. 


The calling sequence to S$WAIT consists of setting AY, the jump to SWAIT, 
followed by two arguments. The first argument must be a data test on the AO. 
I.e. it must be (in instruction format) of the form 13 XXx@ 03; where XXX 


specifies the test. The second word is the address of the flag whose condition 
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is being tested. The easiest way to specify the arguments to S$WAIT is to 


follow the JU SWAIT with a JC on the AO. E.g. for the example above: 


ZR OAY 3SET AY = @ 
JU SWAIT 
JC AO, GTZ, IDONE 3;SET UP BOTH ARGUMENTS 


Note that the JC AO, GTZ, IDONE is never executed; it only serves to 


establish the arguments - word 1 is the data test on AO, word 2 is the address 


"IDONE". 


Description: 

What SWAIT does is to set the AO to the ADD state, load the contents of 
IDONE into AX, (the caller having set the contents of AY) and test the AO for 
the condition specified in the calling sequence. If the condition is true 
(successful), the caller is set active, and $WAIT returns following the two 
arguments. If the condition is not true, the calling processor is set inactive 
in such a ae that the next time it is inoKed it reenters the $WAIT routine 


to repeat the test. Thus the caller is temporarily removed from the system. 


Notes 


1) Since the caller may be set inactive, no registers are saved. Thus, 
a call to S$WAIT could result in all registers being altered. The only 
conditions guaranteed on return are: 


a) AY is same as before call to SWAIT. 
b) AO is in ADD state. 

c) LNK is clear. 

d) BOV is clear. 
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(Although it seems that a guaranteed condition should also be: 
AX is equal to the contents of the flag tested, it is not the case. 
Most of the time it will be---but in some systems it is possible 
for the flag to be altered between the time it was tested and the 
time return is made from $WAIT.) 


2) SWAIT can be called from an inactive area. 


However, the caller 
will be active upon return. 
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ENQUEUE, DEQUEUE 


Length: 71, (57,0) 

Entry Points: $ENQ, SENQF, S$DEQ, $DEQF 

Function: First-in, first-out list using linking pointers. 
Usage: 

The primary use of these routines is to facilitate the passing of large 
blocks of data from one system component to another without having to physically 
move the data from one area of core to another. This scheme also allows data 
to "back-up" without being lost if a real-time system should become temporarily 


overloaded. 


When a part or all of a system uses this approach to handle data, the 
components must reference so-called "queues" to find out where the data is 
located. A particular queue consists of two words at a known place in memory. 
The first word of the queue contains the address of the first word of the first 
item (e.g. block of data) on the queue. The first word of the first item (link 
word) contains the address of the first word (link word) of the second item on 
the queue, the first word of the second item contains the address of the first 
word of the third item, etc. The first word of the last item on the queue is 
set to zero to identify it as being last. The second word of the queue contains 
the address of the first word of the last item on the queue. Figure 4 offers 
a pictoral representation of the enqueuing process. An empty queue is identified 
by the first word of the queue being zero -- and in this case the second word 
must contain the address of the first word. Figure 4 also illustrates an empty 


queue. 
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SENQ (or $ENQF) is provided to enter a new item as the last item on a 
queue, and $DEQ (or DEQF) is provided to remove the first item from a queue. 
Both of these routines involve changing link words only, they do not move any 


data from one place to another. 


Calling Sequence - $ENQ, $ENQF 
Load AX with address of link word of new iten. 
JU SENQ (or JU SENQF) 
WRD QADDR sADDRESS OF FIRST WORD OF 2 WORD QUEUE 


This adds the item whose link word address is in AX to the end of the 
queue at QADDR. SENQ returns with interrupt control on, SENQF returns with 


interrupt control off (FOI ICF). Neither AX nor AY is changed by SENQ or SENQF. 


Calling Sequence — $DEQ, SDEQF 


JU SDEQ (or JU $DEQF) 
WRD QADDR ;ADDRESS OF FIRST WORD OF 2 WORD QUEUE 


SDEQ (or S$DEQF) returns ifter deleting the top (first) item from the queue 
at QADDR. This brings to the top a new item whose link address is in both QADDR 
and AY. The address of the deleted item's first (link) word is in AX. This is 
convenient for an immediate call to SENQ (or SENQF) to enqueue the same item on 
to another queue to pass data to another component in the system. S$DEQ returns 
with interrupt control on, $DEQF returns with interrupt control off. Figure 5 


shows the dequeuing process. 
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Notes 


1) Normally S$ENQ and $DEQ are the desirable calls. However, in some 
cases, to assure that information is not lost (e.g. dequeuing within 
an inactive area) the "return with ICF" versions should be used. An 
example, which also illustrates "rotating a queue’might be as follows: 


Suppose one of the processors in the system is dedicated to 
handling all teletype input and that there are several teletypes 
on the system. Each teletype has been assigned an input buffer 
by some processor (say via a $GETM) and all the buffers are linked 
onto the queue "TTYIB" (teletype input buffers). Also suppose 
that the word following the link word in each buffer is a flag 
which is set to zero when the input is complete (e.g. the Interrupt 
Service Routine might set this flag when it detects a carriage 
return). The following prologue (inactive) for this processor will, 
at each scan by “RTX, examine the flag in the top item on the queue, 
remove the item from the top of the queue and replace it at the 
bottom. (The next “RTX scan will thus examine a new flag if there 
is more than one buffer on the queue). 


PROL: MR TTYIB, AX ;ADDR. OF TOP BUFFER LINK TO AX. 
JC AX, ETZ, $NEXT ;IF NO ITEMS ON QUEUE. 
RM AX, Pl, .+3 sADDR. OF FLAG TO NXT INSTR. 
MR , AY ;CONTENTS OF FLAG TO AY. 
JC AY, ETZ, ENTER ;FLAG IS G, SO GO ENTER. 
JU $DEQF ;DEQUEUE TOP BUFFER 
WRD TTYIB ;BRINGING UP NEXT BUFFER. 
JU $ENQ ;PUT TOP BACK ON BOTTOM 
WRD TTYIB ; THEREBY ROTATING 

: JU $NEXT 
ENTER: ZM  PSAV ;SET SELF ACTIVE 


Note that the call to $DEQF (rather than S$DEQ) is absolutely 
essential. This is because if $DEQ is called an interrupt could 
occur between the call to dequeue and the call to $ENQ, and since 
the prologue is inactive ZRTX would re-enter at "PROL" so that the 
item dequeued before the interrupt will never be enqueued back onto 
TTYIB (or anywhere else) and is lost to the system. 


2) On return from $DEQ, AY contains the same new value which is in the 
first word of the queue so that if AY is @, the queue is empty. If AX 
is also %, the queue was empty before SDEQ was called. 
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CHAPTER THREE 


STANDARD I/0 SERVICE ROUTINES % RTX 
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A set of interrupt service routines are provided to handle interrupts 
from the teletype and the high speed reader/punch. Before an I/0 device can 
cause an interrupt, the device must be started. Therefore, a set of device 
starter subroutines are provided in conjunction with the interrupt service 
routines. The starters and interrupt service routines are linked by information 
found in a control block. The control block consists primarily of queues 
containing buffers to be used for input and output and the addresses of the 
next locations from which data is to be output and into which data is to be stored. 
Each buffer on an input or output queue must contain a negative count of the 
number of words in the buffer. 

Generally, output works as follows. The desired output device starter is 
called. The starter uses the top buffer on the output queue to determine where 
to start the output from. It then outputs the first character, sets a bit in 
the ISR to allow the output device to interrupt and returns. Then each time 
the output device causes an interrupt, the interrupt service routine bumps the 
count in the output buffer. If the count is not yet zero, the next character 
is output and a non-end-mode return is taken. When the count finally becomes 
zero, the buffer is removed from the output queue and an end-mode return is 
taken. If another output buffer is on the output queue, the output starter is 
called again before the end-mode return is taken. 

For input, the appropriate input starter is called. The starter uses the 
top buffer on the input queue to determine where the first character is to be 
stored. It then sets a bit in the ISR to allow the input device to interrupt, 
starts the input device and returns. Each time the input device interrupts, a 
user subroutine (specified in the control block) is called. This user sub- 


routine allows the user to test for any special end-mode conditions (for example 
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a carriage return or end of message character). When this subroutine returns 
the character is stored in the next location of the input buffer, the count is 
bumped, and if it is non-zero the device is restarted and a non-end-mode return 
is taken. If the count is zero it is reset to the actual number of characters 
stored in the buffer, the buffer is removed from the input queue and an end- 
mode return is taken. If another buffer is on the input queue, the input starter 
is called again before the end-mode return is taken. Note that the end-mode 
condition is signaled by a count equal to zero. Thus, if the user routine dis- 
covers the special end mode condition to be true, he must set the count to -l 
‘so when it is bumped it will become zero and thereby indicate an end-mode con- 
dition. 
In the discussion which follows TTY refers to the teletype, TTI refers to 
the teletype input, TTO to the teletype output, HSR to the high speed reader, 
and HSP to the high speed punch. The term "multiple devices" means two or more 
hardware devices of the same type but with different device addresses. For example 
in a configuration consisting of three teletypes with addresses 77, 67, and 57 
respectively the teletypes are referred to as a set of multiple devices. They all 
interrupt to the same location and use the same bits in the ISR, but the teletypes 
can be distinguished from each other since each has its own unique address and 


its own ready flags. 


Length: 
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SSRET STARTER RETURN 
13, Ci, gy? locations 
This routine contains the common return used by all the 
Standard device starters. Therefore, if any of the standard 


device starters are used, S$SRET must be loaded. If the user 


writes additional device starter subroutines, SSRET could be 


Entry Points: 


$SRET 


SSRT1 


Common Return from Device Starter 

This routine is called by all the standard device starter 
subroutines to return to the calling program.. It sets up SISR 
and ISR to allow the started device to interrupt. When SSRET 
is called register AY must contain the bit to be OR‘d into 
SISR and ISR. The MSR is zeroed, interrupt control is turned 
on and control is returned to the program calling the device 
Starter subroutine. 
Return Address for SSRET 

This location contains the return address-l for the pro- 
gram calling the device starter. This location is used by 
SSRET to return to the program which called the device starter 
Subroutine. Hence a device starter using this routine should 


begin by storing the TRP register into $SRT1. 
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SSAVI Save Routine For ICF Interrupts 


Length: 36, (40, g) locations 


This subroutine is used to save and restore registers 
when an interrupt occurs. Its entries are called by the 
standard ICF-type interrupt acknowledge routines. Therefore, 
if any ICF-type interrupt routines are being used, $SAVI must 
be loaded. If additional ICF-type interrupt routines are 
written by the user, SSAVE may prove useful. 

Entry Points: 
SSAVI soe Registers 
This subroutine is called by all the standard ICF-type 
interrupt acknowledge routines (after the TRP has been stored 
in STRP) to save registers ISR, AX, AY, and MSR when an inter- 
rupt occurs. SSAVI then zeroes the. ISR and issues a FOI ICO to 
allow power fail interrupts only, zeroes the MSR to ensure that 
- the AO is in the ADD state and returns. SSAVI has no arguments. 
SEMR Restore Registers, End-Mode Return 
This routine is called by the standard [CF-type inter- 
rupt service routines. It turns interrupt control off, re- 
stores the registers saved by $SAVI and takes an ICF-type end- 
mode return to %RTX. SEMR has no arguments. 
SNEMR Restore Register, Non-End-Mode Return 
This routine is the same as S$EMR except an ICF-type 


non-end-mode return to ZRTX is taken. 
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STICF Teletype Interrupt Acknowledge - ICF 
Length: Absolute Locations ll, - 16, Plus 30, (24 1g relocatable locations. 


This tape contains the ICF-type interrupt acknowledge routines 
for the teletype. Absolute locations ll, 7 13, are used to save 
the SC when TTI causes an interrupt and to transfer control to the 
TTI interrupt acknowledge routine. Absolute locations 14-16, are 
used to save the SC when TTO interrupts and to transfer control to 
the TTO interrupt acknowledge routine. 

Both the TTI and TTO interrupt acknowledge routines store the 
TRP in STRP, call S$SAVI to save additional registers, store the ad- 
dress-l1 where the SC was stored in SINTL and then check the ready 
flag for TTY77. If TTY77 caused the interrupt, control is trans- 
ferred to the ICF-type TTY77 interrupt service routine. Otherwise, 


STICF halts. If the user adds additional teletypes to the system, 


STICF must be edited and reassembled to check the ready flags for 


both a source tape and relocatable object tape. 
Entry Points: 
STICF ICF-type TIY7/7 Interrupt Acknowledge 
This is a dummy entry entry point since no other standard in- 
terrupt routine references any symbol defined in S$TICF. It is de- 
clared as an entry point simply so the user will know after load- 


ing where the interrupt acknowledge routines have been loaded. 
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TTY77 Interrupt Handler - ICF ($CB77) 


This tape contains the control block, device starter subroutines and 
interrupt service routines for ICF-type handling of TTY77. If another 
Teletype is added to the system it must have a unique address other than 
77. An interrupt handler similar to $CB77 must also be created to handle 
the additional Teletype. To do this, the source tape for $CB77 should be 
copied using ZSTE and the exchange command used to change every occurence 
of 77 to the address of the additional Teletype. This new source tape 
should then be assembled and the resulting object tape loaded to handle 
the additional Teletype. 

For example, suppose another Teletype with address 67 were added to 
the system. Then $CB77 would be copied and all occurences of 77 changed 
to 67. The name of the control block for TTY67 would thus become $CB67, 
the name of the reader starter for TIY67 would become $RS67 and so on. 


In the discussion which follows all references to the Teletype are to 


TTY7/7. 

Length: 427, locations 

Entry Points Detailed descriptions follow 

Name Function 

SCB77 address of control block associated with Teletype 77. 

SSF77 reader stop flag, can be set up by the user to stop 
reader input. 

SRN77 for internal use by Teletype handler, contains address-1l 


to store next reader character. 


Name 


$RQ77 


SRU77 


SKN77 


SKQ77 


SKU77 


SPQ77 


SNN77 


$NQ77 


SEC77 


SRS77 


$KS77 
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Function 

reader queue, contains pointers’ to reader input buffers, 

the user must enqueue reader buffers onto $RQ77. 

contains address of user subroutine to modify reader data 
and/or check for special reader end-mode conditions. 

for internal use by the Teletype handler, contains address-1l 
to store next keyboard character. 

keyboard queue , contains pointers to keyboard input buffers, 
the user must enqueue keyboard buffers onto $KQ77. 

contains address of user subroutine to modify keyboard data 


and/or check for special keyboard end-mode conditions. 


next character to output in priority mode. 


priority output queue, contains pointers to priority output 


SPQ77. 

for rae by Teletype handler, contains address-1 of 
next eaters to output in normal mode. 

normal output queue, contains pointers to normal output buf- 
fers, the user muSt enqueue normal output buffers on $NQ77. 
echo buffer, used by the standard user subroutine $ECHO to 
echo Teletype input. 

reader starter, subroutine called by the user to start 
reader input. 

keyboard starter, subroutine called by the user to start 


keyboard input. 


Name 


$PS77 


SNS 77 


SIP77 


SOP77 


$IL77 


SID77 


SIE77 
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Function 


priority output starter, subroutine called by the user to 
start priority output to TTO. 

normal output starter, subroutine called by the user to 
Start normal output to TTO. 

interrupt service routine to process TTI interupts. 


interrupt service routine to process TIO interrupts. 


‘return address for user subroutine specified in $RU77 or 


$KU77, this return adds one to the count in the input buffer, 
stores the character in the input buffer, then checks the 
count for equal to zero. 

return address for user subroutine specified in $RU77 or 
SKU77, this return stores the character and checks (but does 
not add one to) the count. 

return address for user subroutine specified in $RU77 or 
SKU77, this return checks the count only, it neither adds 


one to the count nor stores the character. 


The Teletype routines provided are buffer oriented. That is, input buf- 


fers are filled with characters from TTI and characters from the output buf- 


fers are sent to TTO. These input buffers and output buffers must be enqueued 


by the user onto the input queues and output queues found in the Teletype con- 


trol block. The control block consists of the following information, each 


label in the control block is an entry point. 
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SSF77: WRD @. 3READER STOP FLAG 
SRN77: WRD @ ;READER NEXT LOC 
$RQ77: WRD @,.-1 | 3READER QUEUE 
$RU77: WRD S$IL77 -USER'S READER SUBROUTINE 
SKN77: WRD G ;KEYBOARD NEXT LOC 
$KQ77: WRD G,.-1 sKEYBOARD QUEUE 
SKU77: WRD $IL77 SUSER'S KEYBOARD SUBROUTINE 
SPN77: WRD @ | ;PRIORITY OUTPUT NEXT LOC 
$PQ77: WRD G,.-1 ;PRIORITY OUTPUT QUEUE 
$NN77: WRD ;NORMAL OUTPUT NEXT LOC 
$NQ77: WRD G,.-1 ;NORMAL OUTPUT QUEUE 
SEC77: WRD G,0,0,@ sECHO BUFFER 


Teletype Input - ICF 


Teletype input may be from either the reader or the keyboard. Therefore 
the Teletype control block has two input queues, one called $RQ77 for reader 
input buffers and the other called $KQ77 for keyboard input buffers. Input 


buffers (both reader and keyboard) must conform to the following format: 


Input Buffer 


The first word is reserved for enqueing the buffer onto the input queue. 


The second word must contain a negative count of the maximum number of char- 
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acters to be stored. Characters will be stored starting in the third word 
of the input buffer. 

There are two Teletype input starter subroutines, one called $RS77 to 
Start reader input and the other called $KS77 to ee keyboard input. Both 
$RS77 and $KS77 are entry points. 
$RS77 

To start input from the Teletype reader, the user should first enqueue 
one or more reader buffers onto the reader queue, then call the reader 
Starter by a JU $RS77. When $RS77 returns, interrupt control will be on, 
reader input will have been intitiated and the ISR set up to allow TTI in- 
terrupts. Then each time TTI interrupts, a character is stored in top buf- 
fer on the reader queue. Note that $RS77 simply initiates reader input, the 
TIL interrupt service routine actually fills the reader buffer. 
$KS77 

To start keyboard ante the user should enqueue one or more keyboard 
buffers onto the keyboard queue and then call the keyboard starter by a JU 
S$KS77. When $KS77 returns, interrupt control will be on, keyboard input will 
have been initiated and the ISR set up to allow TTI interrupts. Then each 
time TTI interrupts, a character is stored in the eos buffer on the keyboard 
queue. 

Since there is no way for the interrupt service routine to know whether 
a TTI interrupt was caused by the reader or by the keyboard, once a Teletype 
input seaveer: 4s calied all TTI interrupts are assumed to be of the source 
implicit in the starter. That is, if $RS77 was called, all TTI interrupts 
are assumed to be from the reader and if $KS77 was called, TTI interrupts are 


assumed, to be from the keyboard. 
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SIP77 
When TTI causes an interrupt, control is transferred to SIP77, the TTI 
interrupt service routine, for processing. If the reader starter was called 
to initiate input $IP77 considers the shoneeree to be from the reader, the 
input queue to be the reader queue and the input buffer to be the top buffer 
on the reader queue. If the keyboard starter was called to initiate input, 
$IP77 considers the character to be from the keyboard, the input queue to be 
the keyboard queue and the input buffer to be the top buffer on the keyboard 
queue. 
Each time $IP77 is entered, it stores a character in the input buffer 
and adds one te he count in the input buffer. When the buffer becomes full 


iti wt. fa «an = Vo. Boo eden eee co 
tion. The count is set to p.ius the number of 


it indicates an end-mode con 
characters stored, the buffer is dequeued from the input queue and an end- 
mode return is taken. The new buffer now on top of the input queue becomes 
the new input buffer. Thus all the buffers on the input queue are filled 
and then dequeued until finally the input queue becomes empty. When this 
happens, input is through and the user must call an input starter before in- 
put will begin again. An exception is during reader input, when the reader 
queue finally becomes empty $IP77 will call the keyboard starter if the key- 
board queue is not empty. 
SSF77 

SSF77 is a flag in the Teletype control block which can be set by the 
user to stop reader input before the reader queue becomes empty. If the 
user sets S$SF77 to one, reader input is Stopped after the next TTI interrupt 


and S$SF77 is reset to zero. In addition, if the keyboard queue is not empty 


keyboard input is automatically started. Once reader input has been stopped 
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in such a manner it can only be restarted by the user jumping to $RS77, at 
which time reader input will continue from where it left off. 
User Input Subroutines 

Before storing a character in the input buffer, the interrupt service 
routine $IP77 calls a user subroutine specified in the control block. If the 
character is from the reader, the user subroutine specified in $RU77 is call- 
ed. If the character is from the keyboard, the user subroutine specified in 
SKU77 is called. 

The user subroutine can modify the data before storing it and also check 
for special end-mode conditions. Three general user sub routines (SASCL, 
SECHO, and S$LINE) are provided. S$ASCI ignores (that is, does not allow the 
service routine to store) zero characters and OR's in bit 7 of non-zero char- 
acters thus ensuring 8-bit ASCII. Thus, if the user wishes to input ASCII 
characters from the reader, $RU77 should contain $ASCI. $ECHO performs the 
same function as S$ASCI but in addition echoes the input character. Thus, if 
the user wishes keyboard input to be echoed, $KU77 should contain $ECHO. 
SLINE is used to store a line of ASCII text in the input buffer. It recog- 
nizes the special characters back arrow and rubout to mean respectively, ig- 
nore previous character and ignore the entire line. Also, if a carriage re- 
turn is encountered an end-mode condition is forced even if the input buffer 
is not yet full. 
$IL77, $ID77, $IE/7 

If the user wishes to modify data or check for special end-mode condi- 
tions not covered in $ASCI;, -$ECHO or S$LINE, he may write his own special 
user Subroutines. When the user subroutine is called AY will contain the TTI 


character and AX will contain the address of the input queue. When the user 
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Subroutine has completed its task it should return to one of three places in 
the TTI interrupt service routine. A return to $IL77 will add one to the 
count in the input buffer, store the character (assumed to still be in AY) 
then check the count to see if it is zero indicating the input buffer is full. 
A return to $ID77 stores the data and checks, but does not bump, the count. A 
return to $IE77 neither bumps the count nor stores the data, it simply checks 
the count to see if it is zero. The three returns $IL77, $ID77 and SIE77 are 
all entry points. When the user subroutine is called, $IL77 = TRP+1, SID77 

= TRP+3 and SIE77 = TRP+5. 

Therefore, to ignore a character the user subroutine need only return to 
SIE77. To modify the character before storing, the user subroutine should put 
the modified character in AY before returning to either S$IL77 or SID77, If 
the user subroutine discovers a special end-mode condition it should set the 
count in the input buffer so that when it is checked by the interrupt service 
routine it will be zero indicating an end-mode condition. Specifically, the 
count should be set to minus one if returning to $IL77 and zero if returning 
to $ID77 or SIE77. 

If the user does not wish to modify the data or check for any special 
end-mode conditions the user subroutine should-be specified as $IL77. For ex- 
ample if the user were filling reader buffers with binary data, $RU77 should 
contain $IL77. 

ITI Example 1 

Suppose it is desired to input a maximum of 18 characters from the key- 

board into a buffer called KBUF. The following sequence of code will start 


input from the Teletype keyboard. 
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MRI -22,AX 3SET -COUNT IN 

RM AX, KBUFt1 ;INPUI BUFFER 

MRI KBUF , AX  sENQUEUE INPUT 

JU SENQ ;BUFFER ONTO 

WRD $KQ77 ;INPUI QUEUE & 

JU $KS77 ;START KEYBOARD INPUT 


;CONTINUE PROCESSING 


When SKS77 returns, keyboard input will have been started but the input buf- 

fer will not yet page been filled. Suppose no further processing can be done 
until KBUF is filled. Then $WAIT could be called to wait until the count lo- 
cation in KBUF becomes greater than zero, indicating the buffer has been fill- 


ed and dequeued from the input queue. 


ZR AY ;WAIT UNTIL COUNT 
JU SWAIT ;IS SET GREATER 
JC AO , GTZ ,KBUF+1 ;THAN ZERO, BEFORE PROCESSING 


If the keyboard user subroutine specified in $KU77 were $LINE and the following 
were typed on the keyboard, 
ABD+— CDE > 


KBUF would contain 


“ART X 
70-44-001 
3-15 
Note that $LINE ignored the first D because it was followed by a back arrow 
and that the end-mode condition occurred on the sixth character because it 
was a carriage return. The interrupt service routine set the count to plus 
the actual number of characters stored. 
TTL Example 2 
Suppose it is desired to fill two reader buffers, RB1 and RB2, with a 
maximum of 100_,. binary characters each. The following code would start 


10 


reader input. Since binary data is being input $RU77 should contain QL77. 


MRI -144,AX SET —COUNT 

RM AX, RBI+1 IN READER BUFFER 1 
RM AX, RB2+1 ;AND READER BUFFER 2 
MRI RBI ,AX sENQUE BUFFER 1 

SU SENQ. ONTO INPUT QUEUE 
WRD _ §RQ77 

MRI RB2, AX sAND BUFFER -2 

JU SENQ ;ONTO INPUT QUEUE 
WRD $RQ77 

JU $SRS77 _ 3;START READER INPUT 


As in the case of TTI example 1, when $RS77 returns, reader input will have 
been started but the input buffers will not yet be filled. 
TTL Example 3 

This example shows one way to accomplish double buffering of reader input. 
When a reader buffer is full of (or being filled with) data it appears on the 
"process data queue" called PBQ. When the data in a full reader buffer has 


been processed and is no longer needed, the buffer can be considered empty and 
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will appear on the "reader buffer empty" queue. 

The two reader buffers RB1 and RB2 conform to the format for an input 
buffer (i.e. the first word is reserved for enquing the buffer onto $RQ77, 
the second word contains a negative count, and characters will be stored 
starting in the third word). Since the reader buffers must also be enqueued 
onto the "process data" queue (PBQ) or the “reader buffer empty" queue (RBEQ) 
each of the input buffers is immediately preceded by another link word. Thus 
RB1 is preceded by PB1l which is used to enqueue the first reader buffer onto 
PBQ or RBEQ and RB2 is preceded by PB2 which is used to enqueue the second 
reader buffer onto PBQ or RBEQ. 

The first routine START defines the queues and input buffers, initializes 
the processor list and starts the scan. 

The function of the processor READ is to initiate reader input into empty 
reader buffers. To do this, READ checks to see if there is a Huties on RBEQ. 
If there is it must be an empty buffer which needs to be filled so READ de- 
queues it from RBEQ, enqueues it onto PRQ (queue for buffers being filled) and 
$RQ77 (input queue) and calls the reader starter to begin reader input. Note 
that when the starter is called the reader may still be going because of a 
previous call to the starter. In such a case the starter simply returns. 

The function of the processor PROC is to process data in a full reader 
buffer and then release the buffer for further input. To do this, PROC 
checks to see if there is a buffer on PRQ. If there is the buffer is ei- _ 
ther being filled (indicated by a count less than zero) or is full (indicat- 
ed by a count greater than zero). If the buffer is full PROC processes the 
data then dequeues the buffer from PRQ and enqueues it onto RBEQ so that pro- 


cessor READ can initiate reader input into the now empty buffer. 
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SEXAMPLE 3 
ENTRY P80 sRBE0 


START? MRI PRCL~19AX 


KM AX as SPRCL 


JU SSTRT 
PRCL: WROD READ-2 

~ WROD RSAV-1 

WRO PROC -1.. 

WRD PSAV-1 

WRO @ .. |. 
$FIRST INPUT BUFFER 
P81: WRD P62 
Rei: WRD @ 

WRD  -6 

WROD 2 

WRD 9 

WROD @ 

WRO .@ 

WRO @ 

WRO @ 
sSECONO INPUT BUFFER 
PR2: WRO @ 

RB2: WROD 6 

WROD -6é 
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WROD 38 

WRO @ 

WROD B 

WRO @ 
PBO: WROD Basel 
RSEC: WROD PBI» P62 

END 
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sINITIALIZE 
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sROUTINE TO PROCESS DATA 
ENTRY PROCsPSAV 


sPROLOGUE 
@6 gece 41 PROC: MR PEQ»s AX 3 ANY BUFFERS 
ego geo | 
41 e19¢ @3 Jc AXsE TZ9$NEXTSEEING FILLE 0? 
eaegees 
421 @112 @6 RMI AXsFis@ + YES»CHEC K COUNT TO 
gagees | 
@6 6801 12 MRD e-~isAY 3SEE IF THERE IS A 
eggeesS - | | 
42 1°98 @3 ye AYasL TZs$NEXTSFULL BUFR TO PROCESS 
@ 30808 ce ee itd ee Ae a 

3 TASK 
€a eeee £6 7M PSAV 3 YES-SET ‘ACTIVE 
829026 Ps a 

é sPROCESS DATA 
a 

Q@@ gi22 @3 JU $CEQ "3 REMOVE F:ULL 8LFR 
@ae88ee 
geo eco WRO PBOQ FROM FROCESS CUE UE 
@9 g19¢ @3 JU SENO AND ACO TO 
@geoee a 
eo2eee WRO RBEO 3 "READER BLFFER EMPTY! 
ee gige @3 JU SEXEC. 
eogeeo 
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ENTRY: RSAVsREAD 


sPROLOGUE 
READ: MR 


JC 


2M 
JU 
WROD 
MRI 


RMI 
RMD 
JU 


cane 


KS 
JU 


WRD- 


JU 


JU 


sREAD SAVE 
RSAV: WROD 


REBEO sAX sEMPTY SUFR TO 


AXsETZeSNEXTSBE FILLED? 


RSAV . ....- 3 YES-SET ‘ACTIVE 
$DEOQ. . . $REMOVE EMPTY BUFR 
REEO ;FROM 'BUER EMPTY QUEUE! 
~69AY er 
AXsPi9 SET ~COUNT IN NEW 
AYse-1_ SINPUT BUFR 
SENO  +~+$ADD NEW BUFR TO 
PBO =©———sOsS PROCESS ‘QUEUE 

AXsP1  $sAND TO | 
SENO READER QUEUE 
$RO77 
SkS77_ START REACER INPUT 
SEXEC 

AREA 


READ -1 98 32502 90 


END | 
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Teletype Output - ICF 
$CB77 allows for two types of output to TTO, priority output and normal 
output. Normal output should be used for outputting standard messages and data 
while priority output should be used for outputting important messages such as 
error conditions. The main difference between priority and normal output is 
that while priority output is in effect, no normal output can occur. Whereas, 
when normal output is in effect, it can be Stopped temporarily to allow prior- 
ity output. 
The Teletype control block has two output queues, one called $PQ77 for 
priority output buffers and the other called $NQ77 for normal output buffers. 


Output buffers (both priority and normal) must conform to the following format: 


Output Buffer 


The first word of the output buffer is reserved for enqueuing the buffer 
onto the output queue. The second word must contain a negative count of the 
number of characters in the buffer wah are to be output to TTO. The first 
character output will be in the third word of the output buffer. 

There are two Teletype output starter subroutines, one called $PS77 to 
Start priority output and the other called $NS77 to start normal output. Both 


$PS77 and $NS77 are entry points. 
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$PS77 


To start priority output to TIO the user should first enqueue one or more 
priority output buffers onto the priority output queue, then call the priority 
output Starter by a JU $PS77. When $PS77 returns interrupt control will be on, 
the ISR will be set up to allow TTO interrupts and priority output will have 
been initiated (i.e. the first character from the top buffer on $PQ77 will have 
been output). Then each time TTO interrupts the next character from the prior- 
ity buffer is output. Note that the priority output starter simply initiated 
priority output by outputting the first character. The TIO interrupt service 
routine actually outputs the rest of fie buffer. 

If $PS77 is called while normal output is in effect, the actual initia- 
tion of priority output will be deferred until the next normal output end-mode 
condition occurs (see S$OP77). 
$NS77 

To start normal output to TTO the user should first enqueue one or more 
normal output buffers onto the normal output queue and then call the normal 
output Starter by a JU $NS77. When $Ns77 returns, interrupt control will be 
on, the ISR will be set to allow TTO to interrupt and normal output will have 
been initiated (i.e. the first tae from the top buffer on $NQ77 will 
have been output). If the normal output starter is called while priority out- 
put is in effect, the call to the normal output starter is ignored. 

SOP 77 

When TTO causes an interrupt, control is transferred to $0P77, the TTO in- 

terrupt service routine, for processing. If output was started by the priority 


output Starter then the output queue is considered to be $PQ77 and the output 
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buffer to be the top buffer on $PQ77. If output was started by the normal out- 
put starter then the output queue is considered to be $NQ77 and the output buf- 
fer to be the top buffer on $NQ77. 

Each time $OP77 is entered, it adds one to the count in the output buffer. 
If the count is not yet zero, the next character in the output buffer is output 
to TTO and a non-end-mode return taken. 

If the count has become zero it indicates that the entire buffer has been 
output which is considered to be an end-mode condition. ‘The buffer is dequeued 
from the output queue and the new buffer now on top of the output queue becomes 
the new output buffer. The first character from the new output buffer is out- 
put to TTO and an end-mode return is taken. Thus, each of the buffers on the 
output queue is output to TTO and then dequeued until the output queue becomes 
empty. When this happens, output is through and the user must call an output 
Starter before output to TTO will begin again. 

Each time an end-mode condition occurs during normal output $OP77 checks 
to see if the user has attempted to start priority output. If the user has 
attempted to do so, $OP77 will then start up priority output rather than con- 
tinue on to output the next normal buffer. When normal output is stopped af- 
ter an end-mode condition by $OP77 in order to begin priority sirsue, the 
user must call $NS77 to resume normal output. 

ITO Example 1 

Suppose it is desired to output two buffers, each containing nine char- 

acters, to TTO under normal mode. The following sequence of code would start 


the normal output. 


WRD 


JU 
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-11,AX 3SET —COUNT IN 

AX ,NB1+1 ;NORMAL OUTPUT 

AX ,NB2+1 ;BUFFERS 

NB1,AX | 

SENQ ;ADD 1ST BUFFER 

$NQ77 . :TO NORMAL QUEUE 

NB2,AX 

SENQ- ;THEN 2ND BUFFER 

$NQ77 3TO NORMAL QUEUE 

$NS77 sSTART NORMAL OUTPUT 

;CONTINUE PROCESSING 


When $NS77 returns the normal output will have been started. That is, the 


first character from NBl1 will have been output. If the user now wished to 


stop normal output and start priority output he need only call the priority 


Starter. For example, suppose an error condition was discovered and the user 


wished to print an alarm message stored in a priority buffer called ALRM. 


MRI 
RM 
MRI 
JU 
WRD 


JU 


~7,AX : :SET —COUNT IN 

AX, ALRM+ “sPRIORITY BUFFER 

ALRM, AX 

SENQ -  sADD PRIORITY BUFFER 

$PQ77 STO PRIORITY QUEUE 

$PS77 THEN START PRIORITY OUEPUT 


When $PS77 returns, the actual priority message may not yet have started to 


be output since normal output might be in effect. However, the call to $PS77 


will have been noted and when a normal end-mode condition occurs (i.e. when 
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all of NB1 has been output and NB1 has been dequeued) the output of the pri- 
ority message will begin. When priority output is through the user may wish 
to continue the normal output of NB2 in which case he need only say JU $NS77 


since NB2 is already enqueued onto $NQ77. 


Length: 
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SHICF High Speed Reader/Punch Interrupt Acknowledge - ICF 


Absolute locations 17. - 24. plus 36, (24, 9) relocatable locations. 

This tape contains the ICF-type interrupt acknowledge routines 
for high speed reader/punch 76. Absolute locations 17, - 21, are 
used to save the SC when HSR causes an interrupt and to transfer 
control to the HSR interrupt acknowledge routine. Absolute loca- 
tions 226 - 24. are used to save the SC when HSP causes an interrupt 
and to transfer control to the HSP interrupt acknowledge routine. 

Both the HSR and HSP interrupt acknowledge routines store the 
TRP in $TRP, call $SAVI to save additional registers, and store the 
address-1 where the SC was stored in SINTL. Tid daderruse acknow- 
ledge routines then check ie ready flag for high speed reader/punch 
76 (input ready flag if HSR caused the interrupt or output ready 
flag if HSP caused the interrupt). If high speed reader/punch 76 
caused the interrupt then control is transferred to the ICF-type 
interrupt service eogeine for high sebed reader/punch 76. (SIP76 
if HSR caused the interrupt or $OP76 if HSP caused it.) 

If the interrupt was not caused by high sueud:4eadaie/sunehe 16 
then SHICF halts since an unknown reader/punch shed the interrupt. 
Therefore, if the user adds additional high speed reader punches to 
the system, SHICF must be edited and reassembled to check the ready 
flags for the additional high speed reader punches. For this rea~ 


son SHICF is provided as both a source tape and as a relocatable ob- 


ject tape. 
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Entry Points: 


SHICF ICF-Type High Speed Reader/Punch Interrupt Acknowledge 


This is a dummy entry point since no other standard inter- 
rupt routine references any symbol in S$HICF. Its purpose is 


simply to let the user know into what locations $HICF has been 


loaded. 
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HSR/HSP76 Interrupt Handler — ICF ($CB76) 


This tape contains the control block, device starter subroutines and in- 
terrupt service routines for ICF-type handling of high speed reader/punch 76. 
If another high speed reader/punch is added to the system it must have a 
unique address other than 76. An interrupt handler like $CB76 must also be 
created to handle the additional high speed reader/punch. To do this, the 
source tape for $CB 76 should be copied using “STE and the exchange command 
used to change every occurence of 76'to the address of the additional high 
speed reader/punch. This new source tape should then be assembled and the 
resulting object tape loaded to handle the sadtbional Rion Spsea reader 


punch. 


Length: 220. locations 


Entry Points: Detailed descriptions follow 


Name _ FunctLon 

SCB 76 - . address of control vlock sesaetared ek high speed read- 
er/punch 76. | 

SSF76 HSR stop flag, can be set by the wee stop HSR input. 

SRN76 for internal use by high speed reader/punch handler, con- 
tains address-l to store next character from HSR. 

$RQ76 HSR queue, contains pointers to HSR input buffers, the 
user must enqueue HSR input buffers onto SRQ76. 

SRU76 contains address of user subroutine to modify HSR data 
and/or check for special HSR end-mode eeacdetenes 

SPN76 for internal use by high speed reader/punch handler, con- 


tains address -] of next character to be output to HSP. 


Name 


$PQ76 


SRS 76 


$PS76 


SIP 76 


SOP 76 


SIL76 


$ID76 


SIE76 
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Function 


HSP queue, contains pointers to HSP output buffers, the 
user must enqueue HSP output buffers onto $PQ76 

HSR starter, subroutine called by the user to start input 
from HSR. 

HSP starter, subroutine called by the user to start output 
to HSP. 

interrupt service routine to process HSR interrupts. 
interrupt service routine to process HSP interrupts. 
return address for user subroutine specified in SRU76, 
this return adds be to the count in the HSR input buffer, 
stores the character in-the HSR input buffer, then checks 
the count for equal to zero. 

return address for user subroutine specified in $RU76, 
this return stores the character then checks (but does not 
add one to) the count. 

return address for user subroutine specified in $RU76, 
this return checks the count any. it neither stores the 


character nor adds one to the count. 


The control block for high speed reader/punch 76 is similar to the Tele- 


type control block ($CB77) except that keyboard input and priority output in- 


formation is not included. The control block is as follows, each label in the 


control block is an entry point. 
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$CB76=. 
SRS 76: WRD @ 3HSR STOP FLAG 
$RN76: WRD @ . sHSR NEXT LOC 
$RQ76: WRD G,.-1 sHSR QUEUE 
SRU76: WRD $IL76 5USER'S HSR SUBROUTINE 
SPN76: WRD @ sHSP NEXT LOC 
$PQ76: WRD @,.-1 3;HSP QUEUE 


HSR Input — ICF 


Input from HSR is buffer oriented and the format for an HSR buffer is the 
Same as the format for a Teletype input buffer. That is, the first word is re- 
served for enqueuing the buffer onto the HSR queue ($RQ76) found in the control 
block. The second word contains a negative count of the maximum number of 
characters to be stored and characters from HSR are stored starting in the 
third word. 

Input from HSR is handled in the same manner as reader input from TTI. 
Since there is no keyboard capability with HSR, there is only one HSR starter 
and one HSR queue. As with TTI reader ouffers, the user must enqueue HSR 
buffers onto the input queue $RQ76. | 


SRS 76 


To start input from HSR the user should first enqueue one or more HSR buf- 
fers onto the HSR queue and then call the HSR starter by a JU $RS76. When | 
$RS76 returns, interrupt control will be on, HSR tapae will have eee initiated 
and the ISR set up to allow HSR interrupts. As with the Teletype reader 
starter, $RS76 simply initiates HSR input, the interrupt service fills the HSR 


buffer. 
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$IP76 

When HSR causes an interrupt, control is transferred to $IP76, the HSR 
interrupt service routine, for processing. $IP76 performs the same functions 
as the TTI interrupt service routine $IP7?7. That is, characters are stored 
in the top buffer on the reader queue. When the buffer becomes full the 
count is set to plus the number of characters stored and the buffer is de- 
queued from the reader queue. The new buffer now on top of $RQ76 will then 
be filled and so on until all buffers on $RQ76 have been filled and dequeued. 
HSR input is then through and $RS76 must be called to begin more HSR input. 
SSE76 

SSF76 is a flag in the control block which can be set by the user to 
stop HSR input before the HSR queue becomes empty. If the user sets SSF/6 
to one, HSR input is stopped after the next HSR interrupt and $SF76 is reset 
to zero. Once this has been done the user must call $RS76 to restart HSR in- 
put from where it left off. 
User Input Subroutines 

SIP76 allows for uSer subroutines to alter data and check for special 
end-mode conditions in the same way that $IP77 allows such subroutines. The 
address of the user subroutine should be stored in S$RU76 in ics Roneaal block. 


When the subroutine is called, AY contains the HSR character and AX contains 


the address of the HSR queue. 


SIL76, SKD/6, SIL/76 


The uSer Subroutine must return to one of three locations in the HSR in- 
terrupt Service routine. These three returns are similar to the three returns 
for Teletype user Subroutine returns. A return to $RL76 adds one to the count 


in the input buffer,stores the data (assumed to still be in AY) then checks 
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the count for equal to zero. A return to S$ID76 stores the data and checks, but 
does not bump the count. A return to $IE76 simply checks the count, it neither 
adds one to the count nor stores the data. When the user subroutine is called 
SIL76 = TRP+1, $ID76 = TRP+3, and $IE76 = TRP+5. The standard user subroutine 
SASCI may be used as a uSer subroutine for either HSR input or TTI input, and only 
one copy of $ASCI is needed if both HSR and TTI are running at the same time. 
HSR Example 1 
Suppose it is desired to fill an HSR buffer with a maximum of 48 binary 
characters. The following code would start reader input. Since the data is bi- 


nary $RU76 should contain $IL76. 


MRI -60 , AX ;SET -COUNT 
RM AX ,HSRB+1 ;IN INPUT BUFR. 
MRI HSRB , AX ;ENQUEUE INPUT 
JU SENQ ;BUFFER ONTO HSR 
WRD SRO76 ;QUEUE AND 
JU SRS 76 '  sSTART HSR INPUT 
| ;continue processing 


As in TTI example 1, when $RS76 returns HSR input will have been initiated but 
the input buffer will not yet be full. 
HSP Output — ICF 

The output to HSP is buffer oriented. The format for an HSP output buffer is 
the same as the format for a Teletype output buffer. That is, the first word 
is reserved for enqueuing the buffer onto the HSP output queue ($PQ76) found in 
the control block. The second word contains a negative count of the total num- 


ber of characters to be output from the buffer. The first character output is 
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is in the third word. 

Output to HSP is handled in the same manner as output to TTO. However, 
there is no priority output feature in HSP so there is only one HSP starter 
and one HSP queue. 
$Ps76 

To start output to HSP the user should first enqueue an HSP buffer on the 
HSP queue and then call the HSP starter by a JU $PS76. When S$PS76 returns, in- 
terrupt control will be on, output to HSP will have been initiated and the ISR 
set up to allow HSP interrupts. $PS76 simply initiates output by outputting 
the first character to HSP, the HSP interrupt service routine outputs the re- 
maining characters. 
$0OP 76 

Control is transferred to the HSP interrupt service routine (SOP76) when 
HSP causes an interrupt. $OP76 performs the seme functions as the Tele- 
type interrupt service routine $OP77. That is, each time an HSP interrupt oc- 
curs a character from the output buffer is sent to HSP and the count location 
bumped. When all characters in the buffer have been output the buffer is de- 
queued from $PQ76. The new buffer on top of $PQ76 is output and so on until 
all the buffers have been output and dequeued. HSP output is ae through and 
$PS76 must be called to begin more HSP output. 

HSP Example 1 
The following sequence of code will start output of an 18 character buffer 


called HSPB to HSP. 
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MRI —22,AX 3SET —COUNT 

RM AX ,HSPB+1 3;LN OUTPUT BUFR 

MRI HSPB, AX sENQUEUE OUTPUT 

JU SENQ ;BUFR ONTO HSP 

WRD $PQ76 sQUEUE AND 

JU SPS 76 sSTART HSP OUTPUT 


;continue processing 


As with TTO example 1, when $PS76 returns output to HSP will have been 


Started but the entire buffer will not yet have been output. 


Length: 
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STTYQ TTY ICO Service 


Absolute locations 11-16 plus 631, (409 4g) relocatable locations. 

This tape contains the ICO-type teletype interrupt service 
routines and the associated teletype starter subroutines. Note 
that if 1CO-type teletype interrupt service routines are used, the 
associated ICO-type teletype starter subroutines must also be used. 
The starter routines are called I100-type even though interrupt 
control is off throughout them because these starters are associat- 
ed with ICO-type interrupt service routines. 

The ICO-type teletype interrupt service routines and starters 
are designed to handle multiple teletypes (one or more teletypes, 
each with a unique address). Associated with each teletype must 
be a control block and these eancrat blocks must be enqueued by the 
user onto a queue called STTYQ. The format for an ICO-type tele- 
type control block is the same as ae format for an ICF-type tele- 
type control block ($CB77) except that the ICO-type control block 
has three additional words at the beginning of the control block. 
The first of these three words is reserved for linking to the next 
IcO-type teletype control block. The second and third words con- 
tain the instructions FO @,XX and SF xXx,@ vee pecrieie. where XX is 
the octal address of Hid, Welety oe ascoul Abed with that particular 
control block. The control block must be defined by the eens 

The control Blacks. queued onto STTYQ enables all teletypes to 
use the same ICO-type TTI and TTO interrupt service esata and 


Starters. When an ICO-type Starter is called it has as its argu- 
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ment the address of the control block associated with the par- 
ticular teletype to be started. When an ICO-type interrupt 
service routine processes an interrupt, a subroutine (SFND, 
discussed later) is called to find which teletype caused the 
interrupt. $FND returns the address of the control block as- 
sociated with the teletype which caused the interrupt. The 
information in this control block is then used by the inter- 
rupt service routine to process the interrupt. 

Absolute locations 11-13, are used to store the SC when 


a TTI interrupt occurs and to transfer control to the ICO-type 


TTI interrupt service routine. Absolute locations 14-16, are 


2. ~ Rr Faw 


used to save t and to transfer 
control to the ICO-type TIO interrupt service routine. The 
IcO-type TII and TTO interrupt service routines perform the 

same functions as their ICF-type counterparts, $IP77 and $OP77 
respectively. However, the ICO-type interrupt service routines 
turn interrupt control on while the interrupt is being serviced. 
The I1CO-type teletype interrupt service routines have two unde— 
fined parameters, $LRM and $LPM, which are wea in the calls to 
SICO (see entry points in ZRTX) « SLRM and SLPM are the ISR masks 
for TTI and TTO respectively. The user must define SLBM and SLPM 
as parameters in one of his processors caA declare $LRM and SLPM 
as entry points. All teletypes in a particular system must be 
handled in: the same manner; that is they must ie all ICO-types or 


all ICF-types. 
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Entry Points: 
STTYQ Queue for TTY Control Blocks (ICO-type) 
Contains pointers to the ICO-type teletype control blocks. 
Associated with each teletype is an ICO-type control block whose 
format is the same as an ICF-type teletype control block (see 
$CB77). However, the ICO-type control blocks has three saaheusie 


al words at the beginning. 


word 1 reserved for linking to next control block 
word 2 FO $,XX 
word 3 SF XX,@ 


The XX appearing in words 2 and 3 of the control block are the 
address of the teletype with which this particular control block 
is associated. 
The control blocks must be enqueued onto S$TTYQ by the user. 
STKS TTI Keyboard Starter - ICO 
This subroutine is called to start keyboard input from any 
teletype in a system where teletype interrupts are handled in an 
IcO-type manner. The calling sequence is: 
JU STKS 
WRD x 
where x is the address of the control block ssseeidted with the 
teletype which is to be started. S$TKS performs the same faneerens 


as the ICF-type keyboard starter ($KS77). 


STRS 


STNS 
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TTI Reader Starter - ICO 


When teletypes are being handled in an ICO-type manner, STRS 
should be called to start reader input from any teletype. The 
calling sequence is: 

JU STRS 

WRD x 
where x is the address of the control block associated with the 
particular teletype which is to be started. STRS performs the 
same functions as the ICF-type reader starter ($RS77). 


TTO Normal Output Starter - ICO 


This subroutine should be called to start nowmial output to 
any teletype where teletypes: are 
manner. The calling sequence is: 

JU STNS 

WRD x 
where x is the address of the control block associated with the 
particular teletype wiich is to be Started. $TNS performs the 
same function as the ICF-t;pe normal output eee (SNS77). 
TTO Priority Output Starter -ICO 

This subroutine should be called to start puleets output 
to any teletype in a system where teletypes are being handled 
in an 1CO-type manner. The calling sequence fi: 

JU STPS 

WRD x 
where x is the address of the control block associated with 
the particular teletype being started. STPS performs the same 


functions as the ICF-type priority output starter ($PS77).. 
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SFND FIND INTERRUPTING DEVICE 


Length: 72,(584q) locations 
This tape contains the subroutine $FND which is called by 
the ICO-type teletype interrupt service routines to find which 
particular teletype (in a set of multiple teletypes) caused an 
interrupt. 
Entry Points 
SFND Find Interrupting Device 
This subroutine is used to find which device in a set of 
multiple devices caused an interrupt. It can be exited by any 
IcO-type interrupt service routine which has a control block 


queue in the same format as S$TTYQ. The calling sequence is: 


JU SFND 
WRD xX 
WRD Y 


where X defines the status bits to sense if the device is ready and 


where Y is the address of the control block queue associated with 
the set of multiple devices being tested. When SFND returns, in- 
terrupt control is off and the top buffer on the seneued. biode 
queue is the control block associated with the sepeieulat device 
which caused the interrupt. For example, suppose there ee 
three teletype control blocks named CB1, CB2 and CB3 enqueued on- 
to STTYQ in the order CB2, cB1, CB3.° Lf TTL paaeed an iageerut 


the ICO-type interrupt service routine would call $FND by saying: 


JU SFND 
WRD 1000 ;BIT 9 = STATUS TEST FOR IRDY 
WRD STTYQ;TEST TELETYPES , 


% RTX 
70-44-001 
3-39 


If the teletype associated with CB3 caused the interrupt, $FND 


would return with CB3 as the top buffer on STTYQ. 


SASCI 


Length: 


Function: 


Calling Sequence: 
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311g (37,) Locations 


ASCII ae user exit 

AY contains character from input device. 

AX contains address of input queue in the control block. 
JU SASCI (from within the input interrupt routine) 


If the input character in AY is equal to zero, SASCL 


_Yeturns to TRP + 5 which ignores the character. Other- 


wise, bit 8 is OR'd into AY to ensure an 8-bit ASCII 
character, the siesekes is checked for being a car- 
riage return, anda return is made to TRP + 1. If the 
character is a carriage return, the count location in 
the input buffer is set to -1 so that when the count is 
bumped at TRP + 1, an end mode condition appears. 

This routine is called by SECHO. It can also be used 
as the "user end mode check aubeouttue! specified in 
the control block if the special end mode condition is 


a carriage return. 
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SECHO 
Length: 374g (71,) Locations (ICF) 581g (72,) Locations (ICO) 
Function: To echo TTI keyboard input 
Calling Sequence: AY contains character from TTI keyboard 


AX contains address of keyboard queue in the control 
lock. 
JU SECHO (from within TTI interrupt service) 
The purpose of SECHO is es ouput the character in AY 
by putting it in the echo buffer, enqueuing the echo 
buffer onto the priority output queue and eal tiie- the 
priority output starter. The addresses of the echo 
buffer, priority output queue and priority starter are 
calculated from the address of the keyboard input 
queue. Therefore SECHO can echo the input from 
ieypeaed only. 


SECHO first check: 


yaa ae 


to see if AY is zero. If is is zero, 
a return to TRP + 5 is taken. Otherwise, SASCL is call- 
ed to OR in bit 8 and check for end mode. When $ASCI 
returns, $ECHO checks the count in the echo buffer. If 
pe tuuak is not yet zero then the eater poe character 
has not been echoed and $ECHO return to TRP + 5 as if 
the character were 9 (i.e. the character is inoreds 
Otherwise, the character is stored in the echo buffer. 
The echo buffer is then enqueued onto the priority out— 


put queue, the priority output starter is called and 
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control returns to TRP + 1. If the character was 
a carriage return, a line feed is also echoed. 
SECHO is called by $LINE. There are two versions 
of SECHO, one for use with ICF teletype routines 
and one for use with ICO teletype routines. Both 
versions perform exactly the same functions but 
have different ways of calling the priority output 


Starter. 


SLINE 


Length: 


Function: 


Calling Sequence: 
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724g (119 4) Locations 


To echo and input a line from TII keyboard 
AY contains character from TII keyboard. 


AX contains address of keyboard input queue in the 


JU SLINE (from within Teletype interrupt service 
routine) | 

This subroutine first checks to see if AY is zero. 

If AY is Sets central returns to TRP + 5. Sthaiyiee:. 
SECHO is called. When SECHO returns, the character 
is checked to see if it is a backarrow or rubout. 

If the character is a backarrow, keyboard next loc 
($SKN77) and the count in the keyboard buffer are each 


decremented by one (unless doing so would step these 


and control returns to TRP + 5. This procedure deletes 


the previous character. 


If the character is a Yrubout then the keyboard buffer 


era ey next loc are reset to their initial values, 
thus deleting all previous characters in the line. Con- 
trol then passes to TRP + 5. 

If the character is neither a backarrow nor a rubout, 
then control returns to TRP + l. 


This routine can be used as the "user end mode check 


subroutine" specified in the control block if the user 
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wishes to echo keyboard input where the end mode 


condition is a carriage return, and allowing the 


backarrow and rubout editing features. 
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STKP - TIME KEEPER INTERRUPT SERVICE 


Length: absolute locations 100,-103,, plus 152. relocatable locations 
Function: 

This ICF-type interrupt service routine is used with the Real Time 
Clock to keep track of time-of day and/or time intervals. The routine has 
two constants which are set to the 60 cycle version of the Real Time Clock. 
These constants can be changed to accomodate any setting for the Clock. 


These constants are in S$TPIN and in SIPSC (see below). 


Entry Points: Detailed description follows 


SDAY - day counter 

SHOUR - hour counter 

SMIN - minutes counter 

SSEC - seconds counter 

SFSEC - fraction of second counter 

SCLOC - rollover counter (same units as SFSEC) 

STPIN - ' ticks per deveengee (value counted down in loc 103) 
SIPSC - interrupts per sec (defines $FSEC and $CLOC units) 
STKP ~ start of time-keeper routine (for identification on 


load-map only) 
STMST - routine to start up the Real Time Clock 
SGTTM - routine to obtain time of day 
Detailed Discussion: 
The two constants STPIN and S$IPSC define the units for the operation of 
the program. Both quantities must be set to a negative count. The clock 
hardware increments location 103 at a regular interval determined by Staples 


wired on the clock itself. When location 103 overflows, the clock interrupts. 
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STPIN is the quantity which is placed in location 103 and determines how 
much time elapses before an interrupt occurs. At each interrupt, location 
103 is restored to the constant in $TPIN, and both SCLOC and S$FSEC are in- 
cremented. The value in $CLOC is allowed to overflow (wrap around). The 
value in $FSEC, however, is compared to the value in SIPSC and when their 
sum is equal to @ (SIPSC is negative, $FSEC is positive), the value in SSEC 
is incremented. Thus SIPSC determines the number of interrupts per second. 
SSEC and $MIN are incremented modulo 60. SHOUR is incremented modulo 24, 
the overflow being counted in $DAY. 

To start the timer, the entry STMST should be called by the system 
Start up. The clock will be running with location 103 initialized upon re- 
turn. If any of the quantities $DAY, SHOUR, S$MIN, $SEC or $FSEC are to as- 
sume initial values they should be set before STMST is called. Also, if 
the Real Time Clock being used is not the 60 cycle version, or if it is the 
60 cycle version but interrupts are desired more than once a second, the 
quantities $TPIN and S$IPSC should be set before calling S$TMST. The calling 
sequence itself is simply JU $TMST. Typically this call will er be- 
fore calling $STRT (in %RTX) to get the system going. 

To get instantaneous time-of-day, the entry point $GTITM can be called. 
This routine turns interrupt control off to prevent the ime variables from 
being changed while they are fetched. It then stores $DAY, S$HOUR, SMIN, 
SSEC and $FSEC sequentially in the five locations immediately following the 
JU $GITM, turns interrupt control back on and returns. Thus the call to 
SGTTM should look like 


JU SGTTM 
LOC 2+5 
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where the LOC statement reserves the five locations needed to store the time- 


of-day. 

Examples 
Ey 
ae 
3% 

Notes: 
de 
2. 


If $TKP is used as loaded, the Real Time Clock must be the 60 cycle 
version. $TPIN is set to “74, (-60, ,) and $IPSC is -l1. Thus the 
clock will interrupt once per second after counting 6016 in location 
103 (at the rate of one count per 1/60 second). 

If the real time system requires interrupts every half second and 
the 60 cycle clock is being used, set STPIN to ~ 36, (-30, 9) and SIPSC 
to -2. 

In general, if the rate at which the clock increments location 103 
is n per second, and the unit time interval desired for $CLOC and 
SFSEC is ~ seconds, set STPIN to = and SIPSC to -m. The quantity 
m must be >1 and to keep accurate time, the quantity ~ should be an 


integer. 


The timer algorithm is self-correcting for ineeannes when the clock 
cannot interrupt due to the interrupt control being off. The inter- 
rupt control can be off for a period of time not exceeding the max— 
imum of 

a) one minute or 

b) 32767 clock increments 
without loss of timing accuracy in the long run (i.e. $TKP catches 
up). 
The quantity S$CLOC can be used to time out specified intervals up to 


a maximum interval of 65535 units of ~ seconds (see Examples) using 
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the SWAIT routine as follows: 
Suppose it is desired to delay 100. $CLOC counts before continuing in 


Some processor, The following code accomplishes this: 


MR $CLOC, AX sADD INTERVAL 

MRI 100 , AY 3TO CURRENT $CLOC 

RRG AO ,P1,AY 

JU SWAIT 

JC AO ,GEZ,SCLOC © 3(SEE SWAIT WRITE-UP) 


Since SCLOC is a rollover counter, the comparison supplied to the SWAIT 


routine above will fail until S$CLOC has been incremented at least 100, 


times, even if S$CLOC overflowed somewhere along the line. 


3. STKP always takes an end-mode return after servicing an interrupt. 


% RTX 
70-44-001 
3-49 


#RTX DIRECTORY TAPE 


A directory tape is provided for the Real Time Executive and the 
standard interrupt service routines. It has the following routines in 


this order. 


1. S$TKP 
2. $LINE 
3.  $ASCI 
4. S$TTYQ 
5. SFND 
6. $CB77 
7. $TICF 
8. $CB76 
9. $HICF 
10. $SAVI 
11. $SRET 
12. $SETM 


13. $GETM/SPUTM 
14, SSREL 

15. $WALT 

16. $AHGH/$ALOW 
17. $ATCH 

18. SENQ/SDEQ 


19. Z%RTX 


Notes: 
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If an executive with SUSAV/SURES calls is desired, then the tapes 
for ZRTX, SSREL and SAHGH/SALOW which have calls to SUSAV/SURES 
should be force loaded before the directory tape is loaded. 

If the user has any references to $ECHO (or SLINE which calls 
SECHO) then either the ICO version or the ICF version of SECHO 
must be force loaded either before or after the directory tape has 


been loaded. 
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